home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / System / DOpus / Indy5Theme / Indy5_1024x768.theme < prev    next >
Encoding:
Text File  |  2000-01-13  |  3.0 KB  |  81 lines
  1. /* D5THEME
  2.  
  3.    Indy5_1024x768.theme
  4.  
  5.    Directory Opus Magellan II Theme File
  6.  
  7.    created by PerOneIncorporated
  8.  
  9. */
  10.  
  11. parse arg dopus_port apply_flags
  12. if dopus_port='' then
  13.     dopus_port='DOPUS.1'
  14. address value dopus_port
  15.  
  16. if apply_flags='' then
  17.     apply_flags='PFBS'
  18. else
  19.     apply_flags=upper(apply_flags)
  20.  
  21. options results
  22. options failat 21
  23.  
  24. /* Set background pictures */
  25. if index( apply_flags , "B") ~= 0 then do
  26.     dopus  set  background on
  27.     dopus  set  background "'D5THEMES:Indy5/Screens_1024/'" desktop stretch precision image border off
  28.     dopus  set  background "'D5THEMES:Indy5/Windows_1024/'" lister tile precision image border off
  29.     dopus  set  background "'D5THEMES:Indy5/Patterns/'" req tile precision image border off
  30. end
  31.  
  32. /* Set sound events */
  33. if index( apply_flags , "S") ~= 0 then do
  34.     dopus  set  sound "'Bad disk inserted'" "'D5THEMES:Indy5/Sounds/YouHalt.iff'" 64
  35.     dopus  set  sound "'Close buttons'" "'D5THEMES:Indy5/Sounds/Whip.iff'" 64
  36.     dopus  set  sound "'Close group'" "'D5THEMES:Indy5/Sounds/HeyYou.iff'" 64
  37.     dopus  set  sound "'Close lister'" "'D5THEMES:Indy5/Sounds/EquipMachete.iff'" 64
  38.     dopus  set  sound "'Disk inserted'" "'D5THEMES:Indy5/Sounds/HeyYou.iff'" 64
  39.     dopus  set  sound "'Disk removed'" "'D5THEMES:Indy5/Sounds/Shotgun.iff'" 64
  40.     dopus  set  sound "'FTP close connection'" "'D5THEMES:Indy5/Sounds/FineJacket.iff'" 64
  41.     dopus  set  sound "'FTP connect fail'" "'D5THEMES:Indy5/Sounds/Shotgun.iff'" 64
  42.     dopus  set  sound "'FTP connect success'" "'D5THEMES:Indy5/Sounds/TrustMe.iff'" 64
  43.     dopus  set  sound "'FTP copy fail'" "'D5THEMES:Indy5/Sounds/Shotgun.iff'" 64
  44.     dopus  set  sound "'FTP copy success'" "'D5THEMES:Indy5/Sounds/VeryGood.iff'" 64
  45.     dopus  set  sound "'FTP error'" "'D5THEMES:Indy5/Sounds/Shotgun.iff'" 64
  46.     dopus  set  sound "'Hide'" "'D5THEMES:Indy5/Sounds/FindItem.iff'" 64
  47.     dopus  set  sound "'Open buttons'" "'D5THEMES:Indy5/Sounds/FindItem.iff'" 64
  48.     dopus  set  sound "'Open group'" "'D5THEMES:Indy5/Sounds/FineJacket.iff'" 64
  49.     dopus  set  sound "'Open lister'" "'D5THEMES:Indy5/Sounds/Flourish.iff'" 64
  50.     dopus  set  sound "'Reveal'" "'D5THEMES:Indy5/Sounds/Whip.iff'" 64
  51.     dopus  set  sound "'Shutdown'" "'D5THEMES:Indy5/Sounds/Awechord.iff'" 64
  52.     dopus  set  sound "'Startup'" "'D5THEMES:Indy5/Sounds/BeenAWhile.iff'" 64
  53. end
  54.  
  55. /* Set fonts */
  56. if index( apply_flags , "F") ~= 0 then do
  57.     dopus set font screen "''" 0
  58.     dopus set font listers "'topaz.font'" 8
  59.     dopus set font iconsd "'XEN.font'" 8
  60.     dopus set font iconsw "'XEN.font'" 8
  61. end
  62.  
  63. /* Set colour settings*/
  64. if index( apply_flags , "P") ~= 0 then do
  65.     dopus set pens icons 2 1 3 2 1 3
  66.     dopus set pens files 1 0
  67.     dopus set pens dirs 3 0
  68.     dopus set pens selfiles 2 1
  69.     dopus set pens seldirs 2 3
  70.     dopus set pens devices 1 0
  71.     dopus set pens assigns 2 0
  72.     dopus set pens source 1 5
  73.     dopus set pens dest 2 4
  74.     dopus set pens gauge 3 3
  75.     dopus set pens user 0
  76.     dopus set palette 0x959595 0x000000 0xFFFFFF 0x3B67A2 0x7B7B7B 0xAFAFAF 0xAA907C 0xFFA997 0xEFAF4F 0x7F007F 0xFFFF00 0xCF2F00 0xFF8F00 0xFF00FF 0x9F6F3F 0x00FF9F
  77. end
  78.  
  79. /* Refresh Opus */
  80. dopus refresh all
  81.